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CP/M System Alteration Guide 


1. INTRODUCTION 


The standard CP/M system assumes operation оп ап Intel MDS microcomputer 
development system, but is designed so that the user can alter a specific set 
of subroutines which define the hardware operating environment, In this way, 
the user can produce a diskette which operates with a non-standard (but 
IBM-compatible format) drive controller and/or peripheral devices, 


In order to achieve device independence, CP/M is separated into three 
distinct modules: 


BIOS - Basic I/O System which is environment dependent 

BDOS - Basic Disk Operating System which is not dependent upon 
the hardware configuration 

CCP - the Console Command Processor which uses the BDOS 


Of these modules, only the BIOS is dependent upon the particular hardware, 
That is, the user can "patch" the distribution version of CP/M to provide a 
new BIOS which provides a customized interface between the remaining CP/M 
modules and the user/s own hardware system, The purpose of this document is 
to provide a step-by-step procedure for patching the new BIOS into CP/M, 


The new BIOS requires some relatively simple software development and 
testing; the current BIOS, however, is listed in Appendix C, and can be used 
as a model for the customized package. A skeletal version of the BIOS is 
given in Appendix D which can form the base for a modified BIOS, In addition 
to the BIOS, the user must write a simple memory loader, called GETSYS, which 
brings the operating system into memory, In order to patch the new BIOS into 
CP/M, the user must write the reverse of GETSYS, called PUTSYS, which places 
an altered version of CP/M back onto the diskette,  PUTSYS is usually derived 
from GETSYS by changing the disk read cammands into disk write commands, 
Sample skeletal GETSYS and PUTSYS programs аге described in Section 3, and 
listed in Appendix E, In order to make the CP/M system work automatically, 
the user must also supply a cold start loader, similar to the one provided 
with СР/М (listed in Appendices A and B), А skeletal form of a cold start 
loader is given in Appendix F which can serve as a model for your loader. 


2, FIRST LEVEL SYSTEM REGENERATION 


The procedure to follow to patch the CP/M system is given below in several 
steps, Address references in each step are followed by an "H" to denote the 
hexadecimal radix, and are given for a 16K CP/M system. For larger CP/M 
systems, add a "bias" to each address which is shown with a "+b" following it, 
where b is egual to the memory size minus 16K. Values for b in various 
standard memory sizes are 


24K: b = 24K = 16K = 8K = 02000H 
32K: b = 32K = 16K = 16K = 04000H 
40K: b = 40K - 16K = 24K = 06000H 
48K: b = 48K - 16K = 32K = 08000Н 
56K: b = 56K - 16K = 40K = ØAØØØH 
62K: b = 62K - 16K = 46K = 0B800H 
64K: b = 64K - 16K = 48K = 0С000Н 


Note: The standard distribution version of CP/M is configured as a 16K 
system, Therefore, you must first bring up the 16K CP/M system, and then 
configure it for your actual memory size (see Second Level System Generation). 


(1) Review Section 4 and write a GETSYS program which reads the first two 
tracks of a diskette into memory. The data from the diskette must begin at 
location 2880Н. Code GETSYS so that it starts at location 100Н (base of the 
TPA), as shown in the first part of Appendix Е. 


(2) Test the GETSYS program by reading a blank diskette into memory, and 
check to see that the data has been read properly, and that the diskette has 
not been altered in any way by the GETSYS program, 


(3) Run the GETSYS program using an initialized CP/M diskette to see if 
GETSYS loads CP/M starting at 2880H (the operating system actually starts 128 
bytes later at 2900H). 


(4) Review Section 4 and write the PUTSYS program which writes memory 
starting at 2880H back onto the first two tracks of the diskette, The PUTSYS 
program should be located at 200H, as shown in the second part of Appendix E. 


(5 Test the PUTSYS program using a blank uninitialized diskette Бу 
writing a portion of memory to the first two tracks; clear memory and read it 
back using GETSYS, Test PUTSYS completely, since this program will be used to 
alter CP/M on disk, 


(6) Study Sections 5, 6, and 7, along with the distribution version of 
the BIOS given in Appendix C, and write a simple version which performs a 
similar function for the customized environment, Use the program given in 
Appendix D as a model. Call this new BIOS by the name CBIOS (customized 
BIOS), Implement only the primitive disk operations on a single drive, and 


simple console input/output functions in this phase, 


(7) Test CBIOS completely to ensure that it properly performs console 
character I/O and disk reads and writes, Ве especially careful to ensure that 
no disk write operations occur accidently during read operations, and check 
that the proper track and sectors are addressed on all reads and writes, 
Failure to make these checks may cause destruction of the initialized CP/M 


system after it is patched. 


(8) Referring to Figure 1 in Section 5, note that the BIOS is located 
between locations ЗЕЙЙН and 3FFFH. Read the CP/M system using GETSYS, and 
replace the BIOS segment by the new CBIOS developed in step (6) and tested in 
step (7). This replacement is done in the memory of the machine and will be 
Placed on the diskette in the next step. 


(9) Use PUTSYS to place the patched memory image of CP/M onto the first 
two tracks of a blank diskette for testing, 

(10) Use GETSYS to bring the copied memory image from the test diskette 
back into memory at 288йН, and check to ensure that it has loaded back 
properly (clear memory, if possible, before the load), Upon successful load, 
branch to the cold start code at location 3EØØH. Тһе cold start routine will 
initialize page zero, then jump to the CCP (location 2900H) which will call 
the BDOS, which will call the CBIOS, The CBIOS will be asked to read several 
sectors on track 2 twice in succession, and, if successful, CP/M will type 
"дъ". 


When you make it this far, you are almost оп Ше air, ТЕ you have trouble, 
use whatever debug facilities you have available to trace and breakpoint your 
CBIOS, 


(11) Upon campletion of step (10), СР/М has prompted the console for a 
command input, Test the disk write operation by typing 


SAVE 1 Х.00М 


(геса11 that all commands must Бе followed by а carriage return),  CP/M should 
respond with another prompt (after several disk accesses): 


А> 
If it does not, debug your disk write functions ага try again, 
(12) Test the directory command by typing 
DIR 
CP/M should respond with 


A: X COM 


(13) Test the erase command by typing 
ERA Х. СОМ 


CP/M should respond with the А prompt, When you make it this far, you should 
have an operational system which will only require a bootstrap loader to 
function canpletely. 


(14) Write a bootstrap loader which is similar to GETSYS, and place it 
on track 0, sector 1 using PUTSYS (again using the test diskette, not the 
distribution diskette), See Sections 5 and 8 for more information on the 
bootstrap operation, 


(15) Retest the new test diskette with the bootstrap loader installed by 
executing steps (11), (12), and (13). Upon completion of these tests, type a 
control-C (control and C keys simultaneously). The system should then execute 
a "warm start" which reboots the system and types the A» prompt, 


(16) At this point, you probably һауе a good version of your customized 
CP/M system on your test diskette. Use GETSYS to load CP/M from your test 
diskette, Remove the test diskette, place the distribution diskette (or a 
legal copy) into the drive, and use PUTSYS to replace the distribution version 
by your customized version, По not make this replacement if you are unsure of 
your patch since this step destroys the system which was sent to you from 
Digital Research, 


(17) Load your modified CP/M system, and test it by typing 
DIR 
CP/M should respond with a list of files which are provided on the initialized 
diskette, One such file should be the memory image for the debugger, called 
DDT, COM, 
NOTE: from now on, it is important that you always reboot 
the CP/M system if a diskette is removed and replaced 
by another diskette, unless the new diskette is to be 
read only, 
(18) Load and test the debugger by typing 
DDT 
(see the document "CP/M Dynamic Debugging Tool  (DDT)" for operating 
information and examples), Take time to familiarize yourself with DDT; it 
will be your best friend in later steps, 


(19) Before making further CBIOS modifications, practice using the editor 
(see the ED user/s guide), and assembler (see the ASM user's guide). Then 


recode and test the GETSYS, PUTSYS, and CBIOS programs using ED, ASM, and 
рот, Code and test а (ОРУ program which does а sector-to-sector copy from one 
diskette to another to obtain Баск-ир copies of the original diskette (КОТЕ: 
read your CP/M Licensing Aqreement; it specifies your legal responsibilities 
when copying the CP/M system), Place the copyright notice 


Copyright (с) 1978 
Digital Research 


on each copy which is made with your COPY program, 


(20) Modify your CBIOS to include the extra fumctions for punches, 
readers, signon messages, and so-forth, and add the facilities for additional 
drives, if they exists on your system, You can make these changes with the 
GETSYS and PUTSYS programs which you have developed, or you can refer to the 
following section, which outlines CP/M facilities which will aid you in the 
regeneration process, 


You now have a good copy of the customized CP/M system, Note that 
although the CBIOS portion of CP/M which you have developed belongs to you, 
the modified version of CP/M which you have created can be copied for your use 
only (again, read your Licensing Agreement) and cannot be legally copied for 
anyone else's use, f 


It should be noted that your system remains file-compatible with all other 
CP/M systems, which allows transfer of non-proprietary software between users 
of CP/M, 


3. SECOND LEVEL SYSTEM GENERATION 


Now that you have the CP/M system running, you will want to configure CP/M 
for your memory size, In general, you will first get a memory image of CP/M 
with the "MOVCPM" program (system relocator) and place this memory image onto 
a named disk file. Тһе disk file can then be loaded, examined, patched, and 
replaced using the editor, assembler, debugger, and system generation program, 
For further details on the operation of these programs, see the "Guide to CP/M 
Features and Facilities" manual, 


To get the memory image of CP/M into the TPA configured for the desired 
memory size, give the command: 


MOVCPM xx * 


where "xx" is the memory size in decimal K bytes (e.g., 32 for 32K). Тһе 
response will be: 


CONSTRUCTING xxK CP/M VERS 1.4 
READY FOR "SYSGEN" OR 
"SAVE 32 CPMxx,COOM" 


At this point, the image of CP/M in the TPA is configured for the desired 
memory size, The memory image is at location 0900Н through 207FH (i.e., the 
BOOT is at 0900H, the CCP is at 980H, and the BIOS is at 1E8@H). Note that 
the memory image has the standard MDS-800 BIOS and BOOT on it, It is now 
necessary to save the memory image in a file so that you can patch your CBIOS 
and CBOOT into it: 


SAVE 32 CPMxx,COM Save 20H = 32 pages of memory 


The memory image created by the "MOVCPM" program is offset by a negative bias 
So that it loads into the free area of the TPA, and thus does not interfere 
with the operation of CP/M in higher memory, This memory image can be 
subsequently loaded under DDT and examined or changed in preparation for a new 
generation of the system. DDI is loaded with the memory image by typing: 


DDT CPMxx,COM Load DDT, then read the CPM image 
DDT should respond with 


NEXT РС 
2100 0100 


You can then use the display (D) and disassembly (L) commands to examine 
portions of the memory image between 900H and 207ЕН, Note, however, that to 
find any particular address within the memory image, you must apply the 
negative bias to the CP/M address to find the actual address, Track 00, 
Sector 01 is loaded to location 900H (you should find the cold start loader at 


900H to 97FH), track 00, sector 02 is loaded into 980H (this is the base of 
the CCP), and so-forth through the entire CP/M system load, In a 16К system, 
for example, the CCP resides at the CP/M address 2900H, but is placed into 
memory at 980H by the SYSGEN program, Thus, the negative bias,denoted by n, 
satisfies 


2900H + n = 980H, or n = 980H - 2900Н 
Assuming two s complement arithmetic, п = @E@8@H, which can be checked by 
2900H + ЙЕ080Н = 10980H = 0980H (ignoring high-order overflow). 
Note that for larger systems, n satisfies 
(2900H4b) + n = 980H, ог 
п = 980H - (2900H + b), ог 
п = 0Е080Н ~ b, 


The value of n for cammon CP/M systems is given below 


memory size bias b negative offset n 
16K 0000Н дейвйн - 0000Н = 0Е080Н 
24К 2000H 0E080H - 2000H = 0С080Н 
32K 4000H ØEØ8ØH = 4000H = 0A080H 
40K 6000H дейван - бйййн = 8080Н 
48К 8000H 0Е080Н = 8000Н = 6080H 
56K QAO00H ØEØ8ØH - ПАЙН = 4080Н 
62K 0В800Н дейвйн - 0B800H =  2880H 
64K gC000H @EQ80H - йсдййн = 2080H 


Assume, for example, that you want to locate the address x within the memory 
image loaded under DDT in a 16K system, First type 


Hx,n Hexadecimal sum and difference 


and DDT will respond with the value of x*n (sum) and x-n (difference). The 
first number printed by DDT will be the actual memory address in the image 
where the data or code will be found, The input 


Н2900,Е080 


for example, will produce 980Н as the sum, which is where the CCP is located 
in the memory image under DDI. 


Use the L command to disassemble portions of your CBIOS located at (3E00H+b)+n 
which, when you use the H command, produces an actual address of 1Е80Н. Тһе 
disassembly command would thus be 


L1E80 


Terminate DDT by typing a control-C ог "GÓ" in order to prepare the patch 
program, Your CBIOS and BOOT can be modified using the editor and assembled 
using ASM, producing files called CBIOS.HEX and ВООТ.НЕХ which contain the 
machine code for CBIOS and BOOT in Intel hex format, In order to integrate 
your new modules, return to DDT by typing 


DDI CPMxx,COM Start DDT and load the CPMxx image 
It is now necessary to patch in your CBOOT and CBIOS routines, The BOOT 
resides at location 0900Н in the memory image. If the actual load address is 
х’, then to calculate the bias (m) use the command: 


H900,x Subtract load address from 
target address, 


The second number typed in response to the command is the desired bias (m). 
For example, if your BOOT executes at 0080H, the command: 


H990 ,80 
will reply 
0980 0880 Sum and difference in hex, 


Therefore, the bias "m" would be 0880Н, To read the BOOT in, give the 
command: 


ICBOOT, НЕХ Input file СВООТ.НЕХ 
Then: 
Rm Read CBOOT with a bias of 
m (2900H-x) 


You may now examine your CBOOT with: 
L900 


We are now ready to replace the CBIOS, Examine the area at 1Е8@Н where the 
previous version of the CBIOS resides, Then type 


ICBIOS,HEX Ready the hex file for loading 
Assume that your CBIOS is being integrated into a 16К CP/M system, and thus is 
based at location ЗЕЙЙН. In order to properly locate the CBIOS in the memory 
image under DDT, we must apply the negative bias n for a 16K system when 
loading the hex file, This is accomplished by typing 


RE080 Read the file with bias 0Е080Н 


Upon completion of the read, re-examine the area where the CBIOS has been 
loaded (use an "11Е8й" command), to ensure that it was loaded properly. When 
you are satisfied that the patch has been made, return from DDT using a 
control-C or "Сӣ" command, 


Now use SYSGEN to place the patched memory image back onto a diskette (use 
a test diskette until you are sure of your patch), as shown in the following 
interaction: 


SYSGEN Start the SYSGEN program 
SYSGEN VERSION 1.4 Sign-on message from SYSGEN 


SOURCE DRIVE NAME (OR RETURN TO SKIP) 
Respond with a carriage return 


to skip the CP/M read operation 
since the system is already in 
memory, 


DESTINATION DRIVE NAME (OR RETURN TO REBOOT) 
Respond with B to write the new 


system to the diskette in drive 
B, 

DESTINATION ON B, THEN TYPE RETURN 
Hit the return key to perform 
the actual write, 

FUNCTION COMPLETE 

DESTINATION DRIVE NAME (OR RETURN TO REBOOT) 
Respond with a carriage return 


to reboot, 


Place the test diskette on drive B (if you are operating with a single-drive 
System, answer "A" rather than "B" to the DESTINATION request; then remove 
your diskette, and replace it with the test diskette), and type a return, The 
System will be replaced on the test diskette, Test the new CP/M system by 
placing the test diskette in drive A and cold-starting., 


Write the Digital Research copyright notice on the diskette, as specified 
in your Licensing Agreement: 


Copyright (c), 1978 
Digital Research 


4. SAMPLE GETSYS AND PUTSYS PROGRAMS 

The following program provides a framework for the GETSYS and PUTSYS 
programs referenced in Section 2. The READSEC and WRITESEC subroutines must 
be inserted by the user to read and write the specific sectors, 


GETSYS PROGRAM - READ TRACKS 0 AND 1 TO MEMORY AT 2880H 


; | REGISTER USE 

ў А (SCRATCH REGISTER) 

4 В TRACK COUNT (0, 1) 

Н с SECTOR COUNT И) 

$ DE (SCRATCH REGISTER PATR) 

е HL LOAD ADDRESS 

; SP SET TO STACK ADDRESS 

START: IXI 5Р,2880Н ;SET STACK POINTER TO SCRATCH AREA 


LXI H, 2880H ;SET BASE LOAD ADDRESS 
MVI B, @ ;START WITH TRACK 0 


RDTRK: ;READ NEXT TRACK (INITIALLY @) 
WI C,1 ¿READ STARTING WITH SECTOR 1 
RDSEC: ;READ NEXT SECTOR 
CALL READSEC ;USER-SUPPLIED SUBROUTINE 
LXI 0,128 ;MOVE LOAD ADDRESS ТО NEXT 1/2 PAGE 
DID D ;HL = HL + 128 
INR C ¿SECTOR = SECTOR + 1 
MOV A,C ¿CHECK FOR END OF TRACK 
CPI 27 
JC RDSEC ? САККУ GENERATED IF SECTOR < 27 
, 
; ARRIVE HERE AT END OF TRACK, MOVE TO NEXT TRACK 
INR B 
MOV А,В ;TEST FOR LAST TRACK 
CPI 2 
JC RDTRK ;CARRY GENERATED IF TRACK < 2 


че se 


ARRIVE HERE AT END OF LOAD, HALT FOR NOW 


USER-SUPPLIED SUBROUTINE TO READ THE DISK 
EADSEC: 
ENTER WITH TRACK NUMBER IN REGISTER B, 
SECTOR NUMBER IN REGISTER C, AND 
ADDRESS TO FILL IN HL 


чо se че че VÜ чо мә 


РОЗН В :SAVE B AND C REGISTERS 
PUSH Н ¿SAVE HL REGISTERS 
Perform disk read at this point, branch to 
label START if an error occurs 
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POP H ;RECOVER HL 


РОР В ;RECOVER B AND C REGISTERS 
RET ;BACK TO MAIN PROGRAM 
END START 


Note that this program is assembled with an assumed origin of 0100, and listed 
in Appendix D for reference purposes, The hexadecimal operation codes which 
are listed on the left may be useful if the program has to be entered through 
your machine's front panel switches, 


The PUTSYS program can be constructed from GETSYS by changing only a few 
operations in the GETSYS program given above, as shown in Appendix E, The 
register pair HL becomes the dump address (next address to write), and 
operations upon these registers do not change within the program, The READSEC 
subroutine is replaced by a WRITESEC subroutine which performs the opposite 
function: data from address HL is written to the track given by register B 
and the sector given by register C, It is often useful to combine GETSYS and 
PUTSYS into a single program during the test and development phase, as shown 
in Appendix E, 
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5. DISKETTE ORGANIZATION 


The sector allocation for the standard distribution version of CP/M is 
given here for reference purposes, The first sector (see Figure 1) contains 
an optional software boot section. Disk controllers are often set up to bring 
track 0, sector 1 into memory at a specific location (often location 0000H). 
The Program in this sector, called LBOOT, has the responsibility of bringing 
the remaining sectors into memory starting at location 2900H+b, If your 
controller does not have a built-in sector load, you can ignore the program in 
track 0, sector 1 and begin the load from track 0 sector 2 to location 
2900H4b., 


As an example, the Intel MDS-800 hardware cold start loader brings track 
Ø, sector 1 into absolute address 3000H, Thus, the distribution version 
contains two very small programs in track 0, sector 1: 


MBOOT - a storage move program which moves LBOOT into 
place following the cold start (Appendix A) 


LBOOT - the cold start boot loader (Appendix B) 


Upon MDS start-up, the 128 byte segment on track 0, sector 1 is brought 
into 3000Н. Тһе MBOOT program gets control, and moves the LBOOT program from 
location 301EH down to location 80H in memory, in order to get LBOOT out of 
the area where CP/M is loaded in a 16K system. Note that the MBOOT 
program would not be needed if the MDS loaded directly to 80H, In general, 
the LBOOT program could be located anywhere outside the CP/M load area, but is 
most often located in the area between (00H and ФЕЕН (below the TPA). 


After the move, MBOOT transfers to LBOOT at 80H. ІВООТ, in turn, loads 
the remainder of track 0 and the initialized portion of track 1 to memory, 
starting at 290@H+b. Тһе user should note that MBOOT and LBOOT are of little 
use in a non-MDS environment, although it is useful to study them since some 
of their actions will have to be duplicated in your cold start loader, 


Figure 1, Diskette Allocation 


Track# Sector# Раде# Memory Address CP/M Module name 


00 01 (boot address) Cold Start Loader 
00 02 00 2900H+b CCP 

" 03 " 2980H+b » 

Е 04 01 2A00H+b " 

Ж 05 Ж 2A80H+b " 

" 06 02 2B00H+b " 

" 07 " 2B8@H+b и 

" 08 03 2C00H+b " 

" 09 " 2C80H-b " 
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2D00H+b 
2D80H+b 
2E00H+b 
2E80H+b 
2F00H+b 
2F80H+b 
3000H+b 
3080H+b 


3100H+b 
З18йн+Ь 
3200H+b 
3280H+b 
3300H+b 
3380H+b 
3400H+b 
3480H+b 
3500H+b 
3580H+b 
3600H+b 
3680H+b 
37дйн+Ь 
378йн+Ь 
3800H+b 
3880H+b 
3900H+b 
3980H+b 
3A00H+b 
3A80H+b 
3B00H+b 
3B80H+b 
3C00H+b 
3C80H+b 
3D00H+b 
3D80H+b 


3E00H+b 
3E8@H+b 
3F00H+b 
3F80H+b 


ССР 


—— cc sm сто n 


BDOS 


BIOS 


— —ac un Úr 


" 10 04 
M" 11 Ш 
Ë 12 05 
u 13 " 
ы 14 06 
" 15 " 
ч 16 07 
00 17 i 
00 18 08 
"o 19 " 
20 09 
" 21 " 
M 22 10 
“ 23 и 
À" 24 11 
" 25 и 
и 26 12 
01 01 i 
i 02 13 
" 03 и 
И 04 14 
" $ 0 5 " 
" 06 15 
"Ç 0 7 " 
i 08 16 
" 09 " 
' 10 17 
" 1 1 " 
" 12 18 
" 1 3 " 
" 14 19 
" 15 “O 
7 16 20 
и 17 и 
01 18 21 
“O 19 " 
" 20 22 
01 21 E 
01 22-26 
02-76 01-26 


(directory and data 
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6. THE BIOS ENTRY POINTS 


The entry points into the BIOS from the cold start loader and BDOS are 
detailed below. Entry to the BIOS is through a "jump vector" between 
locations 3E@@H+b and 3E2CH+b, as shown below (see also Appendices, pages C-2 
and 0-1). The jump vector is а seque се of 15 jump instructions which send 
program control to the individual BIOS subroutines, The BIOS subroutines may 
be empty for certain functions (i.e., they may contain a single RET operation) 
during regeneration of CP/M, but the entries must be present in the jump 
vector, 


It should be noted that there is a 16 byte area reserved in page zero (see 
Section 9) starting at location 40H, which is available as a "scratch" area in 
case the BIOS is implemented in ROM by the user, This scratch area is never 
accessed by any other CP/M subsystem during operation, 


The jump vector at 3E00H+b takes the form shown below, where the 
individual jump addresses are given to the left: 


3E00H+b JMP BOOT ;ARRIVE HERE FROM COLD START LOAD 
ЗЕЙЗН+Ь JMP WBOOT ;ARRIVE HERE FOR WARM START 
ЗЕЙ6Н+Ь JMP CONST ;CHECK FOR CONSOLE CHAR READY 
3E09H+b JMP OONIN ¿READ CONSOLE CHARACTER IN 
3E0CH+b JMP СОКОШ ;WRITE CONSOLE CHARACTER OUT 
3E0FH+b JMP LIST ¿WRITE LISTING CHARACTER OUT 
3E12H+b JMP PUNCH ¿WRITE CHARACTER TO PUNCH DEVICE 
3E15H+b JMP READER ;READ READER DEVICE 

3E18H+b JMP HOME ;MOVE TO TRACK 00 ON SELECTED DISK 
3E1BH+b JMP SELDSK ;SELECT DISK DRIVE 

3E1EH+b JMP SETTRK ;SET TRACK NUMBER 

3E21H+b JMP SETSEC ¿SET SECTOR NUMBER 

3E24H+b JMP SETDMA ;SET DMA ADDRESS 

3E27H+b JMP READ ;READ SELECTED SECTOR 

3E2AH+b JMP WRITE ;WRITE SELECTED SECTOR 


Each jump address corresponds to a particular subroutine which performs the 
specific function, as outlined below. There are three major divisions in the 
jump table: (1) the system (re)initialization which results from calls on BOOT 
and WBOOT, (2) simple character I/O performed by calls on CONST, OONIN, 
CONOUT, LIST, PUNCH, and READER, and (3) diskette I/O performed by calls on 
HOME, SELDSK, SETTRK, SETSEC, SETDMA, READ, and WRITE, 


All simple character I/O operations are assumed to be performed in ASCII, 
upper and lower case, with high order (parity bit) set to zero, An 
end-of-file condition is given by an ASCII control-z (1АН), Peripheral 
devices are seen by CP/M as "logical" devices, and are assigned to physical 
devices within the BIOS, In order to operate, the BDOS needs only the CONST, 
CONIN, and CONOUT subroutines (LIST, PUNCH, and READER are used by PIP, but 
not by the BDOS), Thus, the initial version of CBIOS may have empty 
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subroutines for the remaining АЗСТТ devices, The characteristics of each 
device are 


CONSOLE The principal interactive console which 
communicates with the operator, accessed 
through CONST, CONIN, and CONOUT, Typi- 
cally, the CONSOLE is a device such as а 
CRT or Teletype, 


LIST The principal listing device, if it 
exists on your system, which is usually 
a hard-copy device, such as a printer 
or Teletype. 


PUNCH The principal tape punching device, if it 
exists, which is normally a high-speed 
paper tape punch or Teletype. 


READER The principal tape reading device, such as 
a simple optical reader or Teletype. 


Note that a single peripheral can be assigned as the LIST, PUNCH, and READER 
device simultaneously. If no peripheral device is assigned as the LIST, 
PUNCH, or READER device, the CBIOS created by the user should give an 
appropriate error message so that the system does not "hang" if the device is 
accessed by PIP or some other user program,  Alternately, the PUNCH and LIST 
routines can simply return, and the READER routine can return with а ЈАН 
(ctl-Z) in reg А to indicate immediate end-of-file, 


For added flexibility, the user can optionally implement the "IOBYTE" 
function which allows reassignment of physical and logical devices, The 
IOBYTE function creates a mapping of logical to physical devices which can be 
altered during CP/M processing (see the STAT command), The definition of the 
IOBYTE function corresponds to the Intel standard as follows: a single 
location in memory (currently location 0003Н) is maintained, called IOBYTE, 
which defines the logical to physical device mapping which is in effect at a 
particular time, The mapping is performed by splitting the IOBYTE into four 
distinct fields of two bits each, called the CONSOLE, READER, PUNCH, and LIST 
fields, as shown below: 


most significant least significant 


IOBYTE AT 0003Н | LIST | PUNCH | READER | CONSOLE | 


bits 6,7 bits 4,5 bits 2,3 bits 0,1 
The value in each field can be in the range 0-3, defining the assigned source 


or destination of each logical device, The values which can be assigned to 
each field are given below 
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CONSOLE field (bits 0,1) 
Ø - console is assigned to the console printer device (TTY:) 
1 - console is assigned to the CRT device (CRT:) 
2 - batch mode: use the READER as the CONSOLE input, 
and the LIST device as the CONSOLE output (BAT:) 
3 - user-defined console device (UCl:) 


READER field (bits 2,3) 
Ø -= READER is the Teletype device (ТТҮ:) 
1 - READER is the high-speed reader device (PTR:) 
2 = user-defined reader # 1 (UR1:) 
3 - user-defined reader # 2 (UR2:) 


PUNCH field (bits 4,5) 
0 - PUNCH is the Teletype device (TTY:) 
1 - PUNCH is the high speed punch device (PTP:) 
2 = user-defined punch # 1 (0Р1:) 
3 - user-defined punch # 2 (UP2:) 


LIST field (bits 6,7) 
Ø - LIST is the Teletype device (TTY:) 
1 - LIST is the CRT device (CRT:) 
2 - LIST is the line printer device (LPT:) 
3 = user-defined list device (011:) 


Note again that the implementation of the IOBYTE is optional, and affects only 
the organization of your CBIOS, No CP/M systems use the IOBYTE (although they 
tolerate the existence of the IOBYTE at location 0003H), except for PIP which 
allows access to the physical devices, and STAT which allows logical-physical 
assignments to be made and/or displayed (for more information, see the "CP/M 
Features and Facilities Guide"), In any case, the IOBYTE implementation 
should be amitted until your basic CBIOS is fully implemented and tested; then 
add the IOBYTE to increase your facilities, 


Disk I/O is always performed through a sequence of calls on the various 
disk access subroutines, These set up the disk number to access, the track 
and sector on a particular disk, and the direct memory access (DMA) address 
involved in the I/O operation, After all these parameters have been set up, a 
call is made to the READ or WRITE function to perform the actual I/O 
operation, Note that there is often a single call to SELDSK to select a disk 
drive, followed by a number of read or write operations to the selected disk, 
before selecting another drive for subsequent operations, Similarly, there 
may be a single call to set the DMA address, followed by several calls which 
read or write from the selected DMA address, before the DMA address is 
changed, The track and sector subroutines are always called before the READ 
or WRITE operations are performed, Note that the READ and WRITE routines 
should perform several re-tries (10 is a good number) before reporting the 
error condition to the BDOS, If the error condition is returned to the BDOS, 
it will report the error to the user, The HOME subroutine may or may not 
actually perform the track 00 seek, depending upon your controller 
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characteristics; the important point is that track 00 has been selected for 
the next operation, and is often treated in exactly the same manner as SETTRK 
with a parameter of 00, 


The exact responsibilites of each entry point subroutine are given below: 


BOOT 


CONST 


ONIN 


CONOUT 


The BOOT entry point gets control from the cold start loader 
and is responsible for basic system initialization, includ- 
ing sending a signon message (which can be amitted in the 
first version), If the IOBYTE function is implemented, it 
must be set at this point, The various system parameters 
which are set by the WBOOT entry point must be initialized, 
and control is transferred to the CCP at 2900H+b for further 
processing, Note that reg C must be set to zero to select 
drive A, 


The WBOOT entry point gets control when a warm start occurs, 
A warm start is performed whenever a user program branches to 
location 000ЙН, or when the CPU is reset from the front panel. 
The CP/M system must be loaded from the first two tracks of 
drive A up to, but not including, the BIOS (or CBIOS, if you 
have campleted your patch), System parameters must be ini- 
tialized as shown below: 


location 0,1,2 Set to JMP WBOOT for warm starts 
(0000H: JMP 3EØ3H+b) . 

location 3 Set initial value of IOBYTE, if 
implemented in your CBIOS, 

location 5,6,7 Set to JMP BDOS, which is the 
primary entry point to CP/M for 
transient programs 
(0005H: JMP 3106H+b). 


(See Section 9 for camplete details of page zero use.) 
Upon campletion of the initialization, the WBOOT program 
must branch to the CCP at 2900H-b to (re)start the system, 
Upon entry to the CCP, register C is set to the drive to 
select after system initialization, 


Sample the status of the currently assigned console device; 
return @FFH in register A if a character is ready to read 
and 00H in register A if no console characters are ready. 


Read the next console character into register A, and set the 
high-order (parity bit), If no console character is ready, 
wait until a character is typed before returning, 


Send the character from register C to the console output de- 


vice, The character is in ASCII, with high-order (parity) bit 
set to zero, You may want to include a time-out on a line 
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LIST 


PUNCH 


READER 


HOME 


SELDSK 


SETTRK 


SETSEC 


feed or carriage return, if your console device requires some 
time interval at the end of the line (such as a TI Silent 700 
terminal), You can, if you wish, filter out control char- 
acters which cause your console device to react in a strange 
way (a control-z causes the Lear Seigler terminal to clear 
the screen, for example), 


Send the character from register C to the currently assigned 
listing device, Тһе character is іп ASCII with zero parity. 


Send the character from register C to the currently assigned 
punch device, The character is in ASCII with zero parity. 


Read the next character from the currently assigned reader de- 
vice into register A with zero parity (high-order bit must be 
zero), an end-of-file condition is reported by returning an 
ASCII control-z (1AH), 


Return the disk head of the currently selected disk (initially 
disk A) to the track 00 position, If your controller allows 
access to the track 0 flag from the drive, step the head until 
the track @ flag is detected, If your controller does not 
support this feature, you can translate the HOME call into a 
call on SETTRK with a parameter of 0, 


Select the disk drive given by register C for further opera- 
tions, where register C contains 0 for drive A, 1 for drive B, 
2 for drive C, and 3 for drive D, (The standard CP/M 
distribution version supports a maximum of four drives). If 
your system has less than 4 drives, you may wish to give an 
error message at the console, and terminate execution, It is 
advisable to postpone the actual disk select operation until 
an I/O function (seek, read or write) is actually performed, 
since disk selects often occur without ultimately performing 
any disk I/O, and many controllers will unload the head of the 
current disk before selecting the new drive, This would 
cause an excessive amount of noise and disk wear, 


Register C contains the track number for subsequent disk 
accesses on the currently selected drive, You can choose to 
seek the selected track at this time, or delay the seek until 
the next read or write actually occurs, Register C can take 
on values in the range 0-76 corresponding to valid track 
numbers, 


Register C contains the sector number (1 through 26) for sub- 
sequent disk accesses on the currently selected drive, You 
can choose to send this information to the controller at this 
point, or instead delay sector selection until a read or 
write operation occurs, 
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ЗЕТОМА 


WRITE 


Registers B and C (high-order 8 bits in B, low=order 8 bits 
in C) contain the DMA (Direct Memory Access) address for sub- 
sequent read or write operations, For example, if В = 00H 
and С = 80H when SETDMA is called, then all subsequent read 
operations read their data into 80H through ИРЕН, and all 
subsequent write operations get their data from 80H through 
ØFFH, until the next call to SETDMA occurs, The initial 

DMA address is assumed to be 80H, Note that the controller 
need not actually support direct memory access, ТЕ, for 
example, all data is received and sent through I/O ports, the 
CBIOS which you construct will use the 128-byte area starting 
at the selected DMA address for the memory buffer during the 
following read or write operations, 


Assuming the drive has been selected, the track has been set, 
the sector has been set, and the DMA address has been speci- 
fied, the READ subroutine attempts to read one sector based 

upon these parameters, and returns the following error codes 


in register A: 


0 no errors occurred 
1 non=recoverable error condition occurred 


Currently, CP/M responds only to a zero or non-zero value as 
the return code, That 15, if the value in register А 15 0 
then CP/M assumes that the disk operation completed properly. 
If an error occurs, however, the CBIOS should attempt at 
least 10 re-tries to see if the error is recoverable, When ап 
error is reported the BDOS will print the message "BDOS ERR 
ON x: BAD SECTOR," The operator then has the option of 
typing «cr» to ignore the error, or control-C to abort. 


Write the data from the currently selected DMA address to the 
currently selected drive, track, and sector. The data should 
be marked as "non deleted data" to maintain campatibility 
with other CP/M systems, Тһе error codes given in the READ 
cammand are returned in register A, with error recovery at- 
tempts as described above, 
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7. A SAMPLE BIOS 


The program shown in Appendix D can serve as a basis for your first BIOS, 
The simplest functions are assumed in this BIOS, so that you can enter it 
through the front panel, if absolutely necessary, Note that the user must 
alter and insert code into the subroutines for CONST, CONIN, QGONOUT, READ, 
WRITE, and WAITIO, Storage is reserved for user-supplied code in these 
regions, The scratch area reserved in page zero (see Section 9) for the BIOS 
is used in this program, so that it could be implemented in ROM, if desired. 


Once operational, this skeletal version can be enhanced to print the 
initial sign-on message and perform better error recovery. The subroutines 
for LIST, PUNCH, and READER can be filled-out, and the IOBYTE function can be 
implemented, 


8, A SAMPLE COLD START LOADER 


The program shown in Appendix E can serve as a basis for your cold start 
loader, Тһе disk read function must be supplied by the user, and the proaram 
must be loaded somehow starting at location 0000. Note that space is reserved 
for your patch so that the total amount of storage required for the cold start 
loader is 128 bytes. Eventually, you will probably want to get this loader 
onto the first disk sector (track 0, sector 1) and cause your controller to 
load it into memory automatically upon system start-up, Alternatively, you 
may wish to place the cold start loader into ROM and place it above the CP/M 
system, In this case, it will be necessary to originate the program at a 
higher address and key-in a jump instruction at system start-up which branches 
to the loader, Subsequent warm starts will not require this key-in operation, 
since the entry point “WBOOT gets control, thus bringing the system in from 
disk automatically, Note also that the skeletal cold start loader has minimal 
error recovery, which may be enhanced on later versions, 


20 


9, RESERVED LOCATIONS IN PAGE ZERO 


Main memory paqe 


zero, locations @ИН through ЕЕН, contains several 


seqments of code and data which are used during CP/M processing, Тһе code and 
data areas are given below for reference purposes, 


Locations 
from to 
0000H - 0002H 
0003H - 0003Н 
0004H =- 0004Н 
0005Н - 0007Н 
0008Н - 0027Н 
0030H - 0037H 
0038H - 003AH 
003BH - 003FH 
0040H - 004FH 
0050H - 005ВН 
005СН - 007CH 
0070H - 007FH 


Contents 


Contains a jump instruction to the warm start entry 
point at location ЗЕЙЗН+Ь. This allows a simple 
programmed restart (JMP 0000Н) or manual restart from 
the front panel, 


Contains the Intel standard IOBYTE, which is optionally 
included in the user s CBIOS, as described in Section 6. 


Current default drive number (@=A, 1=В, 2=С, 3-D). 


Contains a jump instruction to the BDOS, and serves two 
purposes: JMP Й005Н provides the primary entry point to 
the BDOS, as described in the manual "CP/M Interface 
Guide," and LHLD 0006H brings the address field of the 
instruction to the HL register pair, This value is the 
lowest address in memory used by CP/M (assuming the CCP 
is being overlayed). Note that the DDT program will 
change the address field to reflect the reduced memory 
size in debug mode, 


(interrupt locations 1 through 5 not used) 

(interrupt location 6, not currently used - reserved) 
Contains а jump instruction into the DDT program when 
running in debug mode for programmed breakpoints, but 
is not otherwise used by CP/M. 


(not currently used - reserved) 


16 byte area reserved for scratch by CBIOS, but is not 
used for any purpose in the distribution version of CP/M 


(not currently used - reserved) 


Default File Control Block produced for a transient pro- 
gram by the Console Command Processor, 


(not currently used - reserved) 
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0080H ~ 00ҒЕН Default 128-byte disk buffer (also filled with the com- 
mand line when a transient is loaded under the CCP), 


Note that this information is setup for normal operation under the CP/M 
System, but can be overwritten by a transient program if the BDOS facilities 
are not required by the transient, If, for example, a particular program 
performs only simple I/O and must begin execution at location 0, it can be 
first loaded into the TPA, using normal CP/M facilities, with a small memory 
move program which gets control when loaded (the memory move program must get 
control from location 0100H, which is the assumed beginning of all transient 
programs), Тһе move program can then proceed to move the entire memory image 
down to location 0, and pass control to the starting address of the memory 
load, Note that if the BIOS is overwritten, or if location Ø (containing the 
warm start entry point) is overwritten, then the programmer must bring the 
CP/M system back into memory with a cold start sequence, 
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10. NOTES FOR USERS OF CP/M VERSION 1.3 


The only difference in memory layout between CP/M versions 1.3 and 1.4 is 
the location of the BDOS, which has been moved down one page (3100h+b instead 
of 3200h+b), Therefore, your present CBIOS must be changed to reflect this. 
Normally, the only change is found in the initialization of the jump 
instruction at location 5. This jump should now be JMP 3106H*b instead of JMP 
3206H+b, Note that the CCP is one page shorter, offsetting the longer BDOS, 
зо that the system load address (2900Н+5) remains the same. CP/M 1.4 also 
supports four drives, and thus your CBIOS must account for a drive select 
value in the range 0-3. No other changes to CP/M affect the CBIOS 


organization, 
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3000 
0080 
0080 
0900 
0078 
0079 
007B 


OOFF 


3000 
3002 


3004 
3006 
3008 


300B 
300E 
3010 
3013 
3014 
3015 
3016 
3017 
3018 
301B 


089Е 
301E 


DB79 
DB7B 


DBFF 
E602 
C20430 


211E30 
0680 
118000 
7Е 

12 
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05 
C21330 
C38000 


APPENDIX А: 


MDS LOADER MOVE 


THE MDS LOADER MOVE PROGRAM 


PROGRAM, PLACES COLD START BOOT AT ВООТВ 


OFG 3000H МЕ ARE LOADED BERE ON СОШ) START 
BOOTB EQU 80H ;START OF COLD BOOT PROGRAM 
BOOTL EQU 80H ;LENGTH OF BOOT 
MBIAS  EQU 900н-$  ;BIAS TO ADD DURING LOAD 
BASE EQU Q78H  ; BASE USED BY DISK CONTROLLER 
RTYPE EQU BASE+1 ;RESULT ТУРЕ 
RBYTE EQU BASE+3  ;RESULT TYPE 
BSW EQU OFFH ;ВООТ SWITCH 
; CLEAR DISK STATUS 
IN RTYPE 
IN RBYTE 
, 
COLDSTART: 
IN BSW 
ANI 2H ;SWITCH ON? 
JNZ COLDSTART 
? 
LXI H,BOOTV ;VIRTUAL BASE 
MVI B,BOOTL ;LENGTH OF BOOT 
LXI D,BOOTB ;DESTINATION OF BOOT 
MOVE: MOV А,М 
STAX D ;TRANSFERRED ONE BYTE 
INX H 
INX D 
DCR B 
JNZ MOVE 
JMP BOOTB ;ТО BOOT SYSTEM 
, 
BOOTV: ;BOOT LOADER PLACE НЕВЕ AT SYSTEM GENERATION 
LBIAS EQU $-80H4MBIAS :OOLD START BOOT BEGINS AT 80H 
END 


0100 
0000 
FFFF 
0000 


0100 
0906 
1800 
1600 
1603 


"f H H H 


0080 ` 


1700 
0002 
002Е 
0019 
0015 


F800 
FF0F 
0078 
0079 
007B 
007F 


0078 
0079 
007A 
0003 
0004 
0100 


0080 


0083 


0085 
0087 


310001 


D37F 


0602 
218700 


APPENDIX B: "THE MDS COLD START LOADER 


MDS COLD START LOADER FOR СР/М 
VERSION 1.4 JANUARY, 1978 


EQU 100H ;BIAS FOR RELOCATION 

EQU 0 

EQU NOT FALSE 

EQU FALSE ;IF TRUE, THEN GO TO MON80 ON ERRORS 


EQU BIAS ;BASE OF DOS LOAD 
EQU 806H+BIAS ;ENTRY TO DOS FOR CALLS 
EQU 1700H-BIAS ;END OF DOS LOAD 
EQU 1500H-BIAS ;COLD START ENTRY FOINT 
EQU BOOT+3 :WARM START ENTRY FOINT 


ORG 80H ;LOADED DOWN FROM HARDWARE BOOT AT 3000H 


EQU BDOSE-BDOSB 


EQU 2 NUMBER OF TRACKS TO READ 

EQU BDOSL/1 28 ;NUMBER OF SECTORS IN DOS 
ЕОО 25 NUMBER OF BDOS SECTORS ON TRACK 0 
EQU BDOSS-BDOSØ ¿NUMBER OF SECTORS ON TRACK 1 


EQU ØF8ØØH INTEL MONITOR BASE 

EQU ØFFØFH  ;RESTART LOCATION FOR MON80 
EQU 078H ; BASE” USED BY CONTROLLER 
EQU BASEHl ;RESULT ТҮРЕ 

EQU BASE-3  ;RESULT BYTE 

EQU BASE-7 ¿RESET CONTROLLER 


EQU BASE ;DISK STATUS PORT 

EQU BASE+1 ;LOW IOPB ADDRESS 

EQU BASE+2  ;HIGH IOPB ADDRESS 

EQU 3H ;RECALIBRATE SELECTED DRIVE 
EQU 4H ;DISK READ FUNCTION 

EQU 100H ;USE END OF BOOT FOR STACK 


LXI SP,STACK;IN CASE OF CALL TO MON8@ 
CLEAR THE CONTROLLER 
OUT RESET LOGIC CLEARED 


MVI B,NTRKS ;NUMBER OF TRACKS TO READ 
LXI H, IOPBÜ 


В-1 


READ FIRST/NEXT TRACK INIO BDOSB 


чо чо 


008A 70 MOV A,L 
0088 0379 OUT ILOW 
0080 7C MOV А,Н 
008Е D37A OUT IHIGH 
0090 DB78 WAITÓ: ІМ DSTAT 
0092 E604 ANI 4 
0094 CA9000 27 WAITO 
, 
; CHECK DISK STATUS 
0097 DB79 IN RTYPE 
0099 E603 ANI 118 
009B FE02 CPI 2 
IF TESTING | 
CNC. РМОМ80 ;GO TO MONITOR IF 11 OR 10 
ENDIF 
IF NOT TESTING 
009D D28000 JNC RSTART ;RETRY THE LOAD 
ENDIF 
7 
0040 ГВ7В IN RBYTE ;1/0 COMPLETE, CHECK STATUS 
; IF NOT READY, THEN GO TO MON80 
00А2 17 RAT, 
00АЗ DCOFFF cc RMON8@  ;NOT READY BIT SET 
00А6 1F RAR ; RESTORE 
00А7 Е61Е ANI 111108  ;OVERRUN/ADDR ERR/SEEK/CRC/XXXX 
, 
IF ‘TESTING 
а RMON8@ ;GO TO MONITOR 
ENDIF 
IF NOT TESTING 
00А9 C28000 JNZ RSTART ;RETRY THE LOAD 
ENDIF 
; 
@йАС 110700 LXI D,IOPBL ;LENGTH OF IOPB 
ОАЕ 19 DAD D ;ADDRESSING NEXT ТОРВ 
0080 05 DCR B ;COUNT DOWN TRACKS 
0081 C28A00 JNZ START 


JMP TO BOOT TO PRINT INITIAL MESSAGE, AND SET UP JMPS 


0084 C30016 JMP BOOT 
; 
; PARAMETER BLOCKS 
0087 80 IOPBÓ: DB 80H ;IOCW, NO UPDATE 
0088 04 DB READF ¿READ FUNCTION 
0089 19 DB BDOSÜ ;# SECTORS TO READ ON TRACK 0 


00 ы 

02 

0001 

= IOPBL 


80 IOPB1: 
04 

15 

01 

01 

800D 


0 #TRACK 0 


2 ¿START WITH SECTOR 2 ON TRACK 0 


BDOSB ¿START АТ BASE OF BDOS 
$-IOPBÜ 


80H 

READF 

BDOS1 ¿SECTORS TO READ ON TRACK 1 
1 #TRACK 1 

1 ¿SECTOR 1 


BDOSB+BDOS0*128 ;BASE OF SECOND READ 


B-3 


APPENDIX C: THE MDS BASIC I/O SYSTEM (BIOS) 


; MDS I/O DRIVERS FOR CP/M 
$ (FOUR DRIVE SINGLE DENSITY VERSION) 
; VERSION 1.4 JANUARY, 1978 
000Е = VERS EQU 14 ;VERSION 1.4 
, 
ў COPYRIGHT (C) 1978 
; DIGITAL RESEARCH 
; BOX 579, PACIFIC GROVE 
; CALIFORNIA, 93950 
FFFF = ТВОЕ EQU ЙЕЕЕЕН  ;VALUE OF "TRUE" 
0000 = FALSE EQU NOT TRUE ;"FALSE" 
ЕЕЕЕ = SAMPLE EQU ТВОЕ ;TRUE IF SAMPLE BIOS 
IF SAMPLE 
2900 - BIAS EQU 29 00H ¿SAMPLE PROGRAM IN 16K SYSTEM 
ENDIF 
IF NOT SAMPLE 
BIAS EQU 0000H ^ ;GENERATE RELOCATABLE CP/M SYSTEM 
ENDIF 
, 
3Е00 = PATCH EQU 1500Н+ВТА$ 
3E00 OFG PATCH 
2900 = CPMB EQU ОйВН+ВТАЗ ;BASE OF СРМ CONSOLE PROCESSOR 
3106 - BDOS EQU В06Н+ВТА5 ¿BASIC DOS (RESIDENT PORTION) 
1500 = CPML EQU $-CPMB ;LENGTH (IN BYTES) OF CPM SYSTEM 
002A = NSECTS EQU CPML/128 ;NUMBER OF SECTORS TO LOAD 
0002 = OFFSET ЕОП 2 ¿NUMBER OF DISK TRACKS USED BY CP/M 
0004 = CDISK EQU 0004H . ;ADDRESS OF LAST LOGGED DISK ON WARM START 
0080 = BUFF EQU 00808 . ;DEFAULT BUFFER ADDRESS 
000A = RETRY EQU 10 МАХ RETRTES ON DISK I/O BEFORE ERROR 


PERFORM FOLLOWING FUNCTIONS 
BOOT COLD START 
WBOOT WARM START (SAVE I/O BYTE) 
(BOOT AND WBOOT ARE THE SAME FOR MDS) 
CONST CONSOLE STATUS 
REG-A = 00 ТЕ NO CHARACTER READY 
REG-A = ЕЕ IF CHARACTER READY 
CONIN | CONSOLE CHARACTER IN (RESULT IN REG-A) 
CONOUT CONSOLE CHARACTER OUT (CHAR IN REG-C) 
LIST LIST OUT (CHAR IN REG-C) 
PUNCH PUNCH OUT (CHAR IN REG-C) 
READER PAPER TAPE READER IN (RESULT TO REG-A) 
HOME MOVE TO TRACK 00 


зо чо чо чо чо чо зо TO TO чо чо чо чо чо 


3E00 
3E03 
3E06 
3E09 
3E0C 
3E0F 
3Е12 
3Е15 
3E18 
ЗЕ1В 
ЗЕ1Е 
ЗЕ21 
ЗЕ24 
ЗЕ27 
ЗЕ2А 


0004 
00FD 
ØØFC 
00F3 
007Е 


Е800 
FFÜF 
F803 
F806 
F809 


C3443E 
C3543E 
C3F23E 
C3F53E 
C3FB3E 
C3FE3E 
C3013F 
C3043F 
C3073F 
C30C3F 
C32A3F 
C32F3F 
C3343F 
C33A3F 
C3433F 


Мо мо чо чо чо зо чо чо чо чо чо чо чо 


: 


~o зо чо чо чо ча чо чо чо чо 


(THE FOLLOWING CALLS SET-UP THE IO PARAMETER BLOCK FOR THE 

MDS, WHICH IS USED TO PERFORM SUBSEQUENT READS AND WRITES) 
SELDSK SELECT DISK GIVEN BY REG-C (0,1,2...) 

SETTRK SET TRACK ADDRESS (0,...76) FOR SUBSEQUENT READ/WRITE 
SETSEC SET SECTOR ADDRESS (1,...,26) FOR SUBSEQUENT READ/WRITE 
SETDMA SET SUBSEQUENT DMA ADDRESS (INITIALLY 89H) 


(READ AND WRITE ASSUME PREVIOUS CALLS TO SET UP THE IO PARAMETERS) 
READ READ TRACK/SECTOR TO PRESET DMA ADDRESS 
WRITE WRITE TRACK/SECTOR FROM PRESET DMA ADDRESS 


JUMP VECTOR FOR INDIVIUAL ROUTINES 


JMP BOOT 
: JMP WBOOT 
JMP CONST 


JMP CONIN 


JMP LIST 
JMP PUNCH 
JMP READER 
JMP HOME 


END OF CONTROLLER - INDEPENDENT CODE, THE REMAINING SUBROUTINES 
ARE TAILORED TO THE PARTICULAR OPERATING ENVIRONMENT, AND MUST 
BE ALTERED FOR ANY SYSTEM WHICH DIFFERS FROM THE INTEL MDS, 


THE FOLLOWING CODE ASSUMES THE MDS MONITOR EXISTS AT 0Е800Н 
AND USES THE I/O SUBROUTINES WITHIN THE MONITOR 


WE ALSO ASSUME THE MDS SYSTEM HAS FOUR DISK DRIVES 


EQU 4 ¿NUMBER OF DRIVES AVAILABLE 

EQU OFDH ;INTERRUPT REVERT FORT 

EQU дЕСН ;INTERRUPT MASK PORT 

EQU дЕЗН ;INTERRUPT CONTROL PORT 

EQU 011151110В ;ENABLE RST @(WARM BOOT), RST 7 (MONITOR) 


MDS MONITOR EQUATES 

EQU 0F800H ;MDS MONITOR 

EQU QFFÜFH  ;RESTART MON8@ (BOOT ERROR) 

EQU 0F803H  ;CONSOLE CHARACTER TO REG-A 

EQU 0F806H  ;READER IN TO REG-A 

EQU QF809H  ;CONSOLE CHAR FROM C TO CONSOLE OUT 


С=2 


F80C = PO EQU @F80CH PUNCH CHAR FROM C TO PUNCH DEVICE 
F80F = LO EQU ÜF8ÜFH ;LIST FROM C TO LIST DEVICE 
F812 - CSTS EQU ЙЕВ12Н ;CONSOLE STATUS 00/ҒЕ TO REGISTER А 
: DISK PORTS AND COMMANDS 
0078 = BASE EQU 78Н ;BASE OF DISK COMMAND ТО PORTS 
0078 - DSTAT EQU BASE DISK STATUS (INPUT) 
0079 = RTYPE ЕОО ВАЅЕ+1 ¿RESULT TYPE (INPUT) 
007B = RBYTE ЕОО BASE-3 ¿RESULT BYTE (INPUT) 
0079 = ILOW EQU BASE+1 ;IOPB LOW ADDRESS (OUTPUT) 
007A = IHIGH EQU BASE+2 ;IOPB HIGH ADDRESS (OUTPUT) 
0004 = READF EQU 4H ¿READ FUNCTION 
0006 = WRITF EQU ЕН sWRITE FUNCTION 
0003 = RECAL EQU 3H ;RECALIBRATE DRIVE 
0004 = IORDY  EQU 4H ¿I/O FINISHED MASK 
000D = CR EQU дон ¿CARRIAGE RETURN 
090A = LF EQU QAH ¿LINE FEED 
SIGNON: ;SIGNON MESSAGE: XXK CP/M VERS Y.Y 
3E2D ØDØAØA DB CR,LF,LF 
IF SAMPLE 
3E30 3136 DB “16° :16K EXAMPLE BIOS 
ENDIF 
IF NOT SAMPLE 
DB 700” MEMORY SIZE FILLED BY RELOCATOR 
ENDIF : 
3E32 4B2043502F DB "K CP/M VERS * 
3E3E 312Е34 DB VERS/10+°0°,°.°,VERS MOD 10-70” 
3E41 000А00 DB CR,LF,0 
BOOT: ¿PRINT SIGNON MESSAGE AND СО TO ССР 
; (КОТЕ: MDS BOOT INITIALIZED IOBYTE АТ 0003H) 
3E44 310001 LXI SP ,BUFF+80H 
3E47 212D3E LXI H,SIGNON 
3E4A CD4C3F CALL PRMSG ¿PRINT MESSAGE 
3E4D AF XRA A CLEAR ACCUMULATOR 
3E4E 320400 STA CDISK ¿SET INITIALLY TO DISK A 
3E51 C3A03E JMP GOCPM ;С0 TO CP/M 
WBOOT:; LOADER ON TRACK 0, SECTOR 1, WHICH WILL BE SKIPPED FOR WARM 
; READ CP/M FROM DISK - ASSUMING THERE IS А 128 BYTE COLD START 
Я START, 
3E54 318000 LXI SP,BUFF ;USING DMA - THUS 80 THRU FF AVAILABLE FOR STACK 
3E57 SEGA MVI C,RETRY ;MAX RETRIES 
3E59 C5 PUSH B 


010029 
CD343F 
0Е00 
CD0C3F 
0Е00 
CD2A3F 
0Е02 
CD2F3F 


C2723E 


ИВООТ@: ;ENTER HERE ON ERROR RETRIES - 
¿SET DMA ADDRESS TO START OF DISK SYSTEM 


`° чо 


RDSEC: 


`° 


RD1: 


мо ~o 


;BOOT FROM DRIVE 0 


¿START WITH TRACK 0 
¿START READING SECTOR 2 


READ SECTORS, COUNT NSECTS TO ZERO 


SECTOR 26, ZERO AND GO TO NEXT TRACK 
¿GET TRACK TO REGISTER А 


?10-ЕККОК COUNT 


¿SAVE SECTOR COUNT 


;RETRY IF ERRORS OCCUR 
¿INCREMENT DMA ADDRESS 
:SECTOR SIZE 


;INCREMENTED DMA ADDRESS IN HL 
#READY FOR CALL TO SET DMA 


SECTOR NUMBER JUST READ 


; 
;READ LAST SECTOR? 


;READY FOR CALL 


¿CLEAR SECTOR NUMBER 
;TO NEXT SECTOR 
;READY FOR CALL 


¿RECALL SECTOR COUNT 
¿DONE? 


ІХІ B,CPMB 
CALL  SETDMA 
MVI C,0 
CALL  SELDSK 
MVI C,0 
CALL  SETTRK 
мут С,2 
CALL ЅЕТЅЕС 
РОР B 

MVI B,NSECTS 
;READ NEXT SECTOR 
PUSH B 

CALL READ 
JIZ BOOTERR 
LHLD IOD 

LXI D,128 
DAD D 

MOV B,H 

MOV CD 
CALL  SETDMA 
ША 106 

СРІ 26 

ас FD1 
MUST BE 

LDA IOT 
IR A 

MOV С,А 
CALL | SETTRK 
XRA A 

INR A 

MOV С,А 
CALL ЅЕТЅЕС 
РОР В 

DCR B 

JIZ RDSEC 


DONE WITH THE LOAD, RESET DEFAULT BUFFER ADDRESS 


; (ENTER HERE FROM COLD START BOOT) 
ENABLE RSTØ AND RST7 


DI 


¿INITIALIZE COMMAND 


? CLEARED 
¿RSTØ AND RST7 BITS ON 


3EAD D3F3 OUT : ICON ;INTERRUPT CONTROL 


SET DEFAULT BUFFER ADDRESS TO 80H 


чо че 


ЗЕАЕ 018000 LXI B,BUFF 
3EB2 CD343F CALL SETDMA 
, 
: RESET MONITOR ENTRY POINTS 
3EB5 3EC3 MVI А, МР 
ЗЕВ7 320000 STA 0 
ЗЕВА 21033E LXI H,WBOOTE 
3EBD 220100 SHLD 1. ;JMP WBOOT AT LOCATION 00 
3EC0 320500 STA 5 
3EC3 210631 LXI H,BDOS 
ЗЕС6 220600 SHLD 6 ;JMP BDOS AT LOCATION 5 
ЗЕС9 323800 STA 7*8 ¿JMP TO MON80 (MAY HAVE BEEN CHANGED BY DDT) 
3ECC 2100F8 LXI H,MON80 
ЗЕСЕ 223900 SHLD 7*8+1 


LEAVE IOBYTE SET 
PREVIOUSLY SELECTED DISK WAS B, SEND PARAMETER TO CPM 


чо мо 


3ED2 3A0400 LDA CDISK ¿LAST LOGGED DISK NUMBER 
3ED5 4F MOV С,А ¿SEND ТО CCP TO LOG IT IN 
3ED6 FB EI 
3ED7 C30029 JMP CPMB 
, 
р ERROR OONDITION OCCURRED, PRINT MESSAGE AND RETRY 
BOOTERR: 
3EDA Cl РОР B RECALL COUNTS 
3EDB 00 DCR С 
3EDC САЕЗЗЕ 92 BOOTER@ 
р TRY AGAIN 
3EDF C5 PUSH B 
ЗЕЕЙ C35A3E JMP WBOOT@ 
BOOTERÓ : | 
; OTHERWISE ТОО MANY RETRIES 
ЗЕЕЗ 21EC3E LXI H , BOOTMSG 
ЗЕЕб CD4C3F CALL PRMSG 
3EE9 C3ØFFF JMP RMON80  ;MDS HARDWARE MONITOR 
BOOTMSG: 
3EEC 3F424F4F54 DB ^?2BOOT ,0 
; 
CONST:  ;OONSOLE STATUS ТО REG-A 
; (EXACTLY THE SAME AS MDS CALL) 
3EF2 C312F8 JMP CSTS 
CONIN: ¿CONSOLE CHARACTER TO REG-A 
3EF5 CD03F8 CALL CI 
3EF8 Е67Ғ ANI 7FH :REMOVE PARITY BIT 


3EFA C9 RET 


CONOUT: ;OONSOLE CHARACTER FROM C TO CONSOLE OUT 


ЗЕЕВ C309F8 JMP 40) 

LIST: ¿LIST DEVICE OUT 

; (EXACTLY THE SAME AS MDS CALL) 
ЗЕЕЕ C30FF8 JMP LO 

PUNCH: ;PUNCH DEVICE OUT 

; (EXACTLY THE SAME AS MDS CALL) 
3F01 C30CF8 JMP FO 


READER: ;READER CHARACTER IN TO REG-A 
(EXACTLY THE SAME AS MDS CALL) 


3FÜ4 C306F8 мр RI 
HOME: ;MOVE TO HOME POSITION 
; TREAT AS TRACK 00 SEEK 

3F07 0Е00 WI C,Ó 

3F09 C32A3F JMP SETTRK 


;SELECT DISK GIVEN BY REGISTER C 

CP/M HAS CHECKED FOR DISK SELECT @ - 3, BUT МЕ MAY HAVE 
A SMALLER MDS SYSTEM, SO CHECK AGAIN AND GIVE ERROR 

BY CALLING MON80 


~o че чо в” 
а 
E 


3FÜC 79 MOV A,C 
3FÜD FE04 CPI NDISKS ;TOO LARGE? 
3FÜF 040ЕЕЕ CNC RMON8Ø  ;GIVES #ADDR MESSAGE AT CONSOLE 
3F12 E602 ANI 10B :00 00 FOR DRIVE 0,1 AND 10 10 FOR DRIVE 2,3 
3Fl4 32DF3F STA DBANK ¿TO SELECT DRIVE BANK 
3Fl7 79 MOV А,С :00, 01, 10, 11 
3F18 E601 ANI 1B ;MDS HAS 0,1 АТ 78, 2,3 АТ 88 
3FlA B7 ORA A ;RESULT 00? 
3F1B CA203F JZ SETDRIVE 
3FlE 3E30 MVI А, 00110000B ¿SELECTS DRIVE 1 IN BANK 
SETDRIVE: ' 
3F20 4F MOV С,А ;SAVE THE FUNCTION 
3F21 21F13F LXI H,IOF ¿IO FUNCTION 
3F24 7E MOV A,M 
3F25 E6CF ANI 11001111B ¿MASK OUT DISK NUMBER 
3F27 Bl ORA C ;MASK IN NEW DISK NUMBER 
3F28 77 MOV M,A ¿SAVE IT ІМ ТОРВ 
3F29 C9 RET 
} 
ГА 
SETTRK: ;SET TRACK ADDRESS GIVEN BY С 
3F2A 21E33F LXI H, IOT 


3F2D 71 MV MC 


ЗЕФЕ C9 RET 


SETSEC: ;SET SECTOR NUMBER GIVEN BY C 


3F2F 79 MOV A,C ¿SECTOR NUMBER TO ACCUM 
3F30 32E43F STA IOS ¿STORE SECTOR NUMBER TO ТОРВ 
3F33 C9 RET 
SETDMA: ;SET DMA ADDRESS GIVEN BY REGS B,C 
3F34 69 MOV L,C 
3F35 60 MOV H,B 
3F36 22Е5ЗЕ SHLD IOD 
3F39 C9 RET 
, 
READ: ;READ NEXT DISK RECORD (ASSUMING DISK/TRK/SEC/DMA SET) 
ЗЕЗА 0E04 MVI C,READF ;SET TO READ FUNCTION 
3F3C CD593F CALL SETFUNC 
3F3F CD693F CALL МАІТІО ;PERFORM READ FUNCTION 
3F42 C9 | ВЕТ MAY HAVE ERROR SET IN REG-A 


WRITE: ;DISK WRITE FUNCTION 


3F43 0E06 MVI C,WRITF 

3F45 CD593F CALL SETFUNC ;SET TO WRITE FUNCTION 
3F48 CD693F CALL WAITIO 

3F4B C9 RET ;MAY HAVE ERROR SET 


; 

; 

$ UTILITY SUBROUTINES 

PRMSG:  ;PRINT MESSAGE AT H,L TO 


3F4C 7E MOV A,M . 
3F4D B7 ORA A ZERO? 
3F4E C8 RZ | 
; MORE TO PRINT 
3F4F E5 PUSH H 
3F50 4F . MOV C,A 
3F51 CDFB3E CALL CONOUT 
3F54 El POP H 
3F55 23 INX H 
ЗЕ56 C34C3F JMP PRMSG 
, 
SETFUNC: | 
; SET FUNCTION FOR NEXT I/O (COMMAND IN REG-C) 
3F59 21БІЗЕ LXI H,IOF ;ТО FUNCTION ADDRESS 
3F5C 7E MOV А,М СЕТ ІТ ТО ACCUMULATOR FOR МАБКТКС 
3Е50 E6F8 АМТ 111110008 ¿REMOVE PREVIOUS COMMAND 
3F5F Bl ORA C :SET TO NEW COMMAND 
3Е60 77 MOV М,А #REPLACED ІМ IOPB 


THE MDS-800 CONTROLLER REQUIRES DISK BANK BIT IN SECTOR BYTE 
MASK THE BIT FROM THE CURRENT I/O FUNCTION 
3F61 E620 ANI 00100000В ¿MASK THE DISK SELECT BIT 


чо чо 


3F63 21E43F IXI H, IOS ¿ADDRESS THE SECTOR SELECT BYTE 


3F66 B6 ORA M ¿SELECT PROPER DISK BANK 
3F67 77 MOV M,A ¿SET DISK SELECT BIT ON/OFF 
3F68 C9 RET 
WAITIO: 
3F69 @EQA MVI C,RETRY ;MAX RETRIES BEFORE PERM ERROR 
REWAIT: 
; START THE I/O FUNCTION AND WAIT FOR COMPLETION 
3F6B CDB83F CALL INTYPE ІМ RTYPE 
3F6E CDC53F CALL INBYTE ¿CLEARS THE CONTROLLER 
3F71 3ADF3F LDA DBANK :SET BANK FLAGS 
3F74 B7 ORA A ¿ZERO IF DRIVE 0,1 AND NZ IF 2,3 
3F75 ЗЕЕЙ MVI A,IOPB AND ЙҒЕН ;LOW ADDRESS FOR ТОРВ 
3F77 063F MVI B,IOPB SHR 8 :HIGH ADDRESS FOR IOPB 
3F79 C2843F JNZ IODR1 :DRIVE BANK 1? 
3F7C D379 OUT ILOW ¿LOW ADDRESS TO CONTROLLER 
3F7E 78 MOV A,B 
3F7F D37A OUT IHIGH :HIGH ADDRESS 
3F81 C3893F JMP WAITO ;TO WAIT FOR COMPLETE 
IODR1: ;DRIVE BANK 1 
3F84 D389 OUT ILOW+1 øH :88 FOR DRIVE BANK 19 
3F86 78 MOV A,B 
3F87 D38A OUT IHIGH+10H 
3F89 CDD23F WAIT@: CALL INSTAT :WAIT FOR COMPLETION 
3F8C E604 ANI IORDY : READY? 
3F8E CA893F JZ WAIT 
Н CHECK IO COMPLETION ОК 
3F91 CDB83F CALL INTYPE ¿MUST BE IO COMPLETE (00) UNLINKED 
H 00 UNLINKED I/O COMPLETE, 01 LINKED I/O COMPLETE (МОТ USED) 
; 10 DISK STATUS CHANGED 11 (NOT USED) 
3Е94 ЕЕЙ2 CPI 10B ¿READY STATUS CHANGE? 
3F96 CAAB3F JZ WREADY 
; MUST ВЕ 00 IN THE АССОМШАТОК 
3F99 B7 ORA A 
3F9A C2B13F JNZ WERROR :SOME OTHER CONDITION, RETRY 
; CHECK I/O ERROR BITS 
3F9D CDC53F CALL INBYTE 
ЗЕАЙ 17 RAL 
3FAl ГААВЗҒ JC WREADY :UNIT NOT READY 
ЗЕА4 1F RAR 
3FA5 E6FE ANI 11111110B . АМҮ OTHER ERRORS? (DELETED DATA ОК) 
3FA7 C2B13F JNZ WERROR 


~e 


3FAA 


3FAB 
3FAE 


3FB1 
3FB2 


3FB5 
3FB7 


3FB8 
3FBB 
3FBC 
3FBF 
ЗЕСІ 
3FC2 
3FC4 


3FC5 
3FC8 
3FC9 
3FCC 
ЗЕСЕ 
ЗЕСЕ 
3FD1 


C9 


CDC53F 
C3B13F 


° 
, 


READ OR WRITE IS OK, ACCUMULATOR CONTAINS ZERO 
RET 


WREADY: ;NOT READY, TREAT AS ERROR FOR NOW 
CALL INBYTE ;CLEAR RESULT BYTE 
JMP TRYCOUNT 
WERROR: ;RETURN HARDWARE MALFUNCTION (CRC, TRACK, SEEK, ETC.) 
; THE MDS CONTROLLER HAS RETURNED A BIT IN EACH FOSITION 
; OF THE ACCUMULATOR, CORRESPONDING TO THE CONDITIONS: 
; 0 — DELETED DATA (ACCEPTED AS OK ABOVE) 
; 1 - CRC ERROR 
; 2 — SEEK ERROR 
; 3 — ADDRESS ERROR (HARDWARE MALFUNCTION) 
; 4 - DATA OVER/UNDER FLOW (HARDWARE MALFUNCTION) 
; 5 - WRITE PROTECT (TREATED AS NOT READY) 
; 6 - WRITE ERROR (HARDWARE MALFUNCTION) 
; 7 - МОТ READY 
; (ACCUMULATOR BITS ARE NUMBERED 7654321 Ø) 
; ТТ МАУ BE USEFUL TO FILTER OUT THE VARIOUS CONDITIONS, 
; BUT WE WILL GET А PERMANENT ERROR MESSAGE ТЕ ТТ IS NOT 
; RECOVERABLE. ІМ ANY CASE, THE NOT READY CONDITION IS 
; TREATED АЗ A SEPARATE CONDITION FOR LATER IMPROVEMENT 
TRYCOUNT: 
; REGISTER C CONTAINS RETRY COUNT, DECREMENT “TIL ZERO 
DCR C 
JNZ REWAIT ¿FOR ANOTHER TRY 
; CANNOT RECOVER FROM ERROR 
MVI NN ;ERROR CODE 
RET 
; INTYPE, INBYTE, INSTAT READ DRIVE BANK 00 OR 10 
INTYPE: ША DBANK 
ORA A 
JNZ INTYPl ;SKIP TO BANK 10 
IN ВТУРЕ 
ВЕТ 
INTYPl: IN RTYPE+10H ;78 FOR 0,1 88 FOR 2,3 
`RET 
INBYTE: ША DBANK 
ORA A 
INZ INBYT1 
IN RBYTE 
RET 
INBYTl: IN RBYTE+1 ØH 
RET 


3FD2 
3FD5 
3FD6 
3FD9 
3FDB 
3FDC 
3FDE 


3FDF 


ЗЕЕЙ 
ЗҒЕ1 
3FE2 
3FE3 
3FE4 
3FE5 


3FE7 


3ADF3F 
B7 
C2DC3F 
DB78 
C9 
DB88 
C9 


00 


80 
04 
01 
02 
01 
8000 


INSTAT: 


INSTAL: 


OW se ме че чо 


UJ 
Б 
> 


LDA 
ORA 


DBANK 
A 
INSTAL] 
DSTAT 


DSTAT+1 ØH 


DATA AREAS (MUST BE IN RAM) 


DB 


0 ;DISK BANK 00 IF DRIVE 0,1 
; 10 IF DRIVE 2,3 


, 
;IO PARAMETER BLOCK 


80H ;NORMAL I/O OPERATION 
READF ;10 FUNCTION, INITIAL READ 
1 NUMBER OF SECTORS TO READ 
OFFSET ;TRACK NUMBER 

1 ; SECTOR NUMBER 


BUFF ;IO ADDRESS 


C-10 


APPENDIX D: А SKELETAL CBIOS 


SKELETAL, CBIOS FOR FIRST LEVEL OF СР/М ALTERATION 


чо чо ~o 


NOTE : MSIZE DETERMINES WHERE THIS CBIOS IS LOCATED 


0010 = MSIZE EQU 16 ¿CP/M VERSION MEMORY SIZE IN KILOBYTES 
3Е00 = PATCH EQU MSIZE*1024-2*256 ¿START OF THE CBIOS PATCH 
, 
; МЕ WILL USE THE AREA RESERVED STARTING АТ LOCATION 
P 40Н IN PAGE 0 FOR HOLDING THE VALUES ОҒ: 
; ТВАСК = LAST SELECTED TRACK 
; SECTOR = LAST SELECTED SECTOR 
; DMAAD = LAST SELECTED DMA ADDRESS 
; DISKNO = LAST SELECTED DISK NUMBER 
; (NOTE THAT ALL АВЕ BYTE VALUES EXCEPT FOR DMAAD) 
, 
0040 = SCRAT EQU 40H ¿BASE OF SCRATCH AREA (FROM 40H TO 4ЕН) 
0040 = TRACK EQU SCRAT ; CURRENTLY SELECTED TRACK 
0041 = SECTOR EQU SCRAT+1 CURRENTLY SELECTED SECTOR 
0042 = DMAAD EQU SCRAT+2 CURRENT DMA ADDRESS 
0044 = DISKNO EOU SCRAT+4 ;CURRENT DISK NUMBER 
; 
3600 ORG PATCH  ;ORGIN OF THIS PROGRAM 
0000 = CBASE ЕОО (MSIZE-16)*1024 ;BIAS FOR SYSTEMS LARGER THAN 16K 
2900 = CPMB EQU CBASE+29 00H ¿BASE OF CP/M (= BASE OF CCP) 
3106 - BDOS EQU CBASE+3106H ‚ВАЗЕ OF RESIDENT PORTION OF CP/M 
1500 = CPML EQU $-CPMB ;LENGTH OF THE CP/M SYSTEM IN BYTES 
002A = NSECTS  EQU CPML/128 sNUMBER OF SECTORS TO LOAD ON WARM START 
; JUMP VECTOR FOR INDIVIDUAL SUBROUTINES 
3E00 C32D3E JMP BOOT ¿COLD START 
WBOOTE: 
3E03 C3303E JMP WBOOT ¿WARM START 
ЗЕй6 C3993E JMP CONST ;CONSOLE STATUS 
3E09 C3AC3E JMP CONIN ;OONSOLE CHARACTER IN 
ЗЕЙС СЗВЕЗЕ JMP CONOUT ;CONSOLE CHARACTER OUT 
ЗЕЙЕ C3Dl3E JMP LIST ;LIST CHARACTER OUT 
3E12 C3D33E JMP PUNCH ;PUNCH CHARACTER OUT 
3E15 C3D53E JMP READER ;READER CHARACTER OUT 
3E18 C3DA3E JMP HOME sMOVE HEAD TO HOME FOSITION 
3E1B C3E03E JMP SELDSK ;SELECT DISK 
3E1E C3F53E JMP SETTRK ;SET TRACK NUMBER 
3E21 C30A3F JMP SETSEC ¿SET SECTOR NUMBER 
3E24 C31F3F JMP SETDMA БЕТ DMA ADDRESS 
3Е27 C3353F JMP READ ;READ DISK 
3E2A C3483F JMP WRITE ¿WRITE DISK 


зо чо 


D-1 


; ` INDIVIDUAL SUBROUTINES TO PERFORM EACH FUNCTION 
ВООТ: ¿SIMPLEST CASE IS TO JUST PERFORM PARAMETER INITIALIZATION 


3E2D C3793E JMP GOCPM ¿INITIALIZE AND GO TO CP/M 
WBOOT': ;SIMPLEST CASE IS TO READ THE DISK UNTIL ALL SECTORS LOADED 
3E30 318000 LXI SP,80H ¿USE SPACE BELOW BUFFER FOR STACK 
3E33 BEBO MVI C,0 ;SELECT DISK 0 
3E35 CDEO3E CALL SELDSK 
3E38 CDDA3E CALL HOME 360 TO TRACK 00 
3E3B 062A | MVI B,NSECTS в ОООМТ5 THE NUMBER OF SECTORS TO LOAD 
3E3D BERD MVI C,0 ІС HAS THE CURRENT TRACK NUMBER 
3E3F 1602 MVI D,2 #D HAS THE NEXT SECTOR TO READ 


NOTE THAT WE BEGIN BY READING TRACK 0, SECTOR 2 SINCE SECTOR 1 
CONTAINS THE OOLD START LOADER, WHICH IS SKIPPED IN A WARM START 


зо чо 


3Е41 210029 LXI H,CPMB . ¿BASE OF CP/M (INITIAL LOAD POINT) 
LOAD]:  ;LOAD ONE MORE SECTOR 

3E44 C5 PUSH B ¿SAVE SECTOR COUNT, CURRENT TRACK 

3Е45 05 PUSH D ¿SAVE NEXT SECTOR TO READ 

3E46 E5 PUSH H ¿SAVE DMA ADDRESS 

3E47 4A MOV C,D СЕТ SECTOR ADDRESS TO REGISTER C 

3E48 CD@A3F CALL SETSEC ;SET SECTOR ADDRESS FROM REGISTER C 

3E4B СІ POP B ;RECALL DMA ADDRESS TO B,C 

ЗЕ4С C5 PUSH B ¿REPLACE ON STACK FOR IATER RECALL 

3E4D CD1F3F CALL SETDMA ;SET DMA ADDRESS FROM В,С 
, 
: DRIVE SET ТО 0, TRACK SET, SECTOR SET, DMA ADDRESS БЕТ 

3E50 CD353F CALL READ 

3E53 РЕЙ CPI 00Н АМҮ ERRORS? 

3E55 C2303E JNZ WBOOT ¿RETRY THE ENTIRE BOOT IF AN ERROR OCCURS 
; NO ERROR, MOVE TO NEXT SECTOR 

3E58 El POP H ;RECALL DMA ADDRESS 

3E59 118000 LXI 0,128  ;DMA=DMA+128 

3ESC 19 DAD D ` #NEW DMA ADDRESS IS IN H,L 

3E5D Dl POP D ¿RECALL SECTOR ADDRESS 

3E5E Cl POP B ¿RECALL NUMBER OF SECTORS REMAINING, AND CURRENT ТВК 

3E5F 05 DCR B ;SECTORS-SECIORS-1 

3E60 CA793E 92 СОСРМ  ;TRANSFER ТО CP/M IF ALL HAVE BEEN LOADED 
; MORE SECTORS REMAIN TO LOAD, CHECK FOR TRACK CHANGE 

3E63 14 INR D 

3E64 7A MOV A,D ;SECTOR-27?, IF SO, CHANGE TRACKS 

3E65 FE1B CPI 27 

3E67 ПА44ЗЕ JC LOAD] +CARRY GENERATED IF SECTOR<27 
? 
š END OF CURRENT TRACK, GO ТО NEXT TRACK 

ЗЕбА 1601 MVI ОД #BEGIN WITH FIRST SECTOR OF NEXT TRACK 

3E6C 0C INR C ;ТВАСК=ТВАСК+1 


LII 


D-2 


3E6D 
ЗЕбЕ 
3E6F 
3E70 
3E73 
3E74 
3E75 
3E76 


3E79 
3E7B 
3E7E 
3E81 


3E84 
3E87 
ЗЕВА 


3E8D 
3E90 


3E93 


3E94 
3E96 


C5 
D5 
E5 
CDF53E 
El 
Dl 
Cl 
C3443E 


3EC3 

320000 
21033E 
220100 


320500 
210631 
220600 


018000 
CD1F3F 


FB 


0Е00 
C30029 


ze 


чо se 


GOCPM: 


`° 


`° 


чо чо че 


че чо чо зо vo зо 


: 
2 


SAVE REGISTER STATE, AND CHANGE TRACKS 
в. 


РОЗН 
РОЗН D 
PUSH H 


CALL SETTRK ;TRACK ADDRESS SET FROM REGISTER C 
POP H 

POP D 

POP B 

JMP LOAD ;FOR ANOTHER SECIOR 


END OF LOAD OPERATION, SET PARAMETERS AND GO TO CP/M 


MVI A,ÜC3H ;C3 IS A JMP INSTRUCTION 

STA 0 ;FOR JMP TO WBOOT 

LXI H,WBOOTE sWBOOT ENTRY POINT 

SHLD 1 ;SET ADDRESS FIELD FOR JMP АТ 0 
STA 5 ¿FOR JMP TO BDOS 

LXI H,BDOS ;BDOS ENTRY POINT 

SHLD 6 ¿ADDRESS FIELD OF JUMP AT 5 TO BDOS 


LXI B,80H ;DEFAULT DMA ADDRESS IS 80H 
CALL SETDMA 


EI ;ENABLE THE INTERRUPI SYSTEM 
FUTURE VERSIONS OF CCP WILL SELECT THE DISK GIVEN BY REGISTER 
C UPON ENTRY, HENCE ZERO IT IN THIS VERSION OF THE BIOS FOR 
FUTURE COMPATIBILITY, 
MVI C,0 ` ¿SELECT DISK ZERO AFTER INITIALIZATION 
JMP CPMB ` ¿GO TO CP/M FOR FURTHER PROCESSING 

N 


SIMPLE I/O HANDLÉRS (MUST BE FILLED IN BY USER) 
IN EACH CASE, THE ENTRY POINT IS PROVIDED, WITH SPACE RESERVED 
TO INSERT YOUR OWN CODE . 


¿CONSOLE STATUS, RETURN ОРЕН IF CHARACTER READY, 00H IF NOT 


DS 10H ¿SPACE FOR STATUS SUBROUTINE 
MVI A, 00H 

RET 

;CONSOLE CHARACTER INTO REGISTER A 

DS 10H ¿SPACE FOR INPUT ROUTINE 
ANT 7FH ¿STRIP PARITY BIT 

RET 


¿CONSOLE CHARACTER OUTPUT FROM REGISTER С | 


MOV A,C ¿GET TO ACCUMULATOR 
DS 10H ¿SPACE FOR OUTPUT ROUTINE 
RET 


D-3 


3ED1 
3ED2 


3ED3 
3ED4 


3ED5 
3ED7 
3ED9 


3EDA 
3EDC 
3EDF 


ЗЕЕЙ 
3EE1 
ЗЕЕ4 
ЗЕЕ4 


3EF5 
3EF6 
3EF9 
3F09 


3FÜA 
3F0ÜB 
3FÜE 
ЗЕТЕ 


ЗЕ1Е 
3Е20 
3F21 
3F24 
3F34 


79 
C9 


79 
C9 


ЗЕТА 
E67F 
C9 


79 
324400 


C9 
79 
324000 
C9 
79 
324100 
C9 
69 
60 
224200 
C9 


H 
PUNCH: 


чо ~o 
° 


: 


| 


зә ID se ~o чо «о ~o зо 


г 
SELDSK: 


SETTRK 


SETSEC: 


SETDMA 


sLIST CHARACTER FROM REGISTER С 


MOV А,С ¿CHARACTER TO REGISTER А 
ВЕТ ;NULI, SUBROUTINE 
;PUNCH CHARACTER FROM REGISTER C 
MOV А,С ¿CHARACTER TO REGISTER А 
ВЕТ ¿NULL SUBROUTINE 


;READ CHARACTER INTO REGISTER А FROM READER DEVICE 
MVI A,lAH ЕМГЕН END OF FILE FOR NOW (REPLACE LATER) 
ANI 7FH ¿REMEMBER TO STRIP PARITY BIT 

RET 


I/O DRIVERS FOR THE DISK FOLLOW 
FOR NOW, WE WILL SIMPLY STORE THE PARAMETERS AWAY FOR USE 


IN THE READ AND WRITE SUBROUTINES 


sMOVE TO THE TRACK 00 POSITION OF CURRENT DRIVE 
TRANSLATE THIS CALL INTO A SETTRK CALL WITH PARAMETER 00 


MVI C,0 ;SELECT TRACK 0 

CALL SETTRK 

RET ;WE WILL MOVE TO 00 ON FIRST READ/WRITE 
;SELECT DISK GIVEN BY REGISTER C 

MOV A,C 

STA DISENO 

DS 10H ¿SPACE FOR DISK SELECTION ROUTINE 
RET 

;SET TRACK GIVEN BY REGISTER C 

MOV A,C 

STA TRACK 

DS 10H ¿SPACE FOR TRACK SELECT 

RET 

;SET SECTOR GIVEN BY REGISTER C 

MOV A,C 

STA SECTOR 

DS 10H ;SPACE FOR SECTOR SELECT 

RET 

¿SET DMA ADDRESS GIVEN BY REGISTERS B AND C 

MOV L,C ¿LOW ORDER ADDRESS 

MOV H,B ;HIGH ORDER ADDRESS 

SHLD DMAAD ;SAVE THE ADDRESS 

DS 10H - ¿SPACE FOR SETTING THE DMA ADDRESS 
RET 
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3F35 
3F45 C3583F 


3F48 


00А7 = 


3F58 3E01 
3F5A C9 
3F5B 


зе Г1-<е зо ~o че ~o че ~o ~o 


;PERFORM READ OPERATION (USUALLY THIS IS SIMILAR TO WRITE 
SO WE WILL ALLOW SPACE TO SET UP READ COMMAND, THEN USE 
COMMON CODE IN WRITE) 

DS 10H ;SET UP READ COMMAND 

JMP WAITIO ;TO PERFORM THE ACTUAL I/O 


¿PERFORM A WRITE OPERATION 
DS 10H ;SET UP WRITE COMMAND 


;ENTER HERE FROM READ AND WRITE TO PERFORM THE ACTUAL I/O 
OPERATION, RETURN A 00H IN REGISTER А IF THE OPERATION COMPLETES 
PROPERLY, AND 01H IF AN ERROR OCCURS DURING THE READ OR WRITE 


IN THIS CASE, WE HAVE SAVED THE DISK NUMBER IN 'DISKNO' (0,1) 
THE TRACK NUMBER IN “TRACK” (0-76) 
THE SECTOR NUMBER IN “SECTOR (1-26) 
THE DMA ADDRESS IN "DMAAD (0-65535) 

ALL REMAINING SPACE FROM $ THROUGH MSIZE*1024-l IS AVAILABLE: 


EQU (М512Е%1024-1)-5 ¿SPACE REMAINING IN CBIOS 
MVI А,1 ;ERROR CONDITION 

RET ;REPLACED WHEN FILLED-IN 

END 
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APPENDIX Е: А SKELETAL GETSYS/PUTSYS PROGRAM 


COMBINED GETSYS AND PUTSYS PROGRAMS FROM SECTION 4 


START THE PROGRAMS AT THE BASE OF THE TRANSIENT PROGRAM AREA 


0100 ORG 100H 

0010 = MSIZE EQU 16 ;SIZE OF MEMORY IN KILOBYTES 
А ВТАЗ IS THE AMOUNT ТО ADD ТО ADDRESSES FOR SYSTEMS LARGER THAN 16K 
; (REFERRED TO AS “В” THROUGHOUT THE TEXT) 

0000 = BIAS EQU (MSIZE-16)*1024 


GETSYS PROGRAM - READ TRACKS Ø AND 1 TO MEMORY AT 2880Н+ВТА5 
REGISTER USE 


, 
H A (SCRATCH REGISTER) 
Я B TRACK COUNT (0...76) 
; С SECTOR COUNT (1...26) 
H D,E (SCRATCH REGISTER PAIR) 
; H,L LOAD ADDRESS 
H S SET TO STACK ADDRESS 
, 
СОТАВТ: #START OF THE GETSYS PROGRAM 
0100 318028 LXI SP,2880H-BIAS ;SET STACK POINTER TO SCRATCH AREA 
0103 218028 LXI H, 2880H+BIAS :SET BASE LOAD ADDRESS 
0106 0600 MVI B,0 ¿START WITH TRACK 00 
RDTRK: ;READ FIRST (NEXT) TRACK 
0108 0Е01 MVI C,1 ¿READ STARTING WITH SECTOR 1 
RDSEC: 
010A С00003 CALL READSEC ¿READ NEXT SECTOR 
0100 118000 LXI D,128 : CHANGE LOAD ADDRESS TO NEXT 1/2 PAGE 
0110 19 DAD D ;HL-HL4128 TO NEXT ADDRESS 
0111 0С INR C : SECTOR=SECTOR+1 
0112 79 MOV A,C ;CHECK FOR END OF TRACK 
0113 FE1B CPI 21 
0115 ГАЙА@1 JC RDSEC ;CARRY GENERATED IF C«27 
H ARRIVE HERE AT END OF TRACK, MOVE TO NEXT TRACK 
0118 04 INR B УТВАСК=ТВАСК+1 
0119 78 MOV A,B ¿CHECK FOR IAST TRACK 
011A ЕЕб2 CPI 2 :?TRACK-2? 
011C DA0801 JC RDTRK ¿CARRY GENERATED IF TRACK < 2 
, 
H ARRIVE HERE AT END OF LOAD, HALT FOR NOW 
011F FB EI 
0120 76 HLT 


PUTSYS PROGRAM - PLACE MEMORY STARTING AT 2880H+BIAS BACK TO TRACKS 
0 AND 1. START THIS PROGRAM ON THE NEXT PAGE 
0200 ORG ($+106H) AND ФРЕФЙН 


чо зо зо 


Е-1 


0200 
0203 
0206 


0208 


020A 
0200 
0210 
0211 
0212 
0213 
0215 


0218 
0219 
021A 
021C 


021F 
0220 


0300 


0300 
0301 


0302 
0303 
0304 


318028 
218028 
0600 


0E01 


CD8003 
118000 
19 

9c 

79 
FE1B 
DA(A02 


04 

78 
FE02 
ГА0802 


ЕВ 
76 


С5 
Е5 


El 
СІ 
C9 


o че зо чо чо чо чо зо 


WRTRK: 


WRSEC: 


чо чо чо зо 


чо чо чо чо чо 


че 


В 


чо зо vo зе 


зе 


REGISTER USE 


А (SCRATCH REGISTER) 
B TRACK COUNT (0,1) 
C SECTOR COUNT (1...26) 
D,E (SCRATCH REGISTER PAIR) 
H,L DUMP ADDRESS 
S SET TO STACK ADDRESS 
;START OF THE PUTSYS PROGRAM 
LXI SP,288ØH+BIAS ;SET STACK POINTER TO SCRATCH AREA 
LXI H,2880H+BIAS ;5ЕТ BASE DUMP ADDRESS 
MVI в,0 ;START WITH TRACK 0 
ЕТТЕ FIRST (NEXT) TRACK 
MVI C,1 ;START WRITING AT SECTOR 1 
ЕТТЕ FIRST (NEXT) SECTOR 
CALL МЕІТЕЅЕС ;PERFÓRM THE WRITE 
LXI D,128 ;MOVE DUMP ADDRESS TO NEXT 1/2 PAGE 
DAD D ;HI=HL+128 
INR C ; SECTOR=SECTOR#1 
MOV А,С ;CHECK РОВ END ОР TRACK 
СРТ 27 ;SECTOR=27? 
JC WRSEC ;CARRY GENERATED IF SECTOR < 27 
ARRIVE HERE AT END OF TRACK, MOVE TO NEXT TRACK 
INR B ;TRACK=TRACK+1 
МУ А,В ;TEST FOR IAST TRACK 
CPI 2 ;TRACK=2? 
JC WRTRK ;CARRY GENERATED IF TRACK < 2 
ARRIVE HERE AT END OF DUMP, HALT FOR NOW 
EI 
HLT 


USER-SUPPLIED SUBROUTINES FOR SECTOR READ AND SECTOR WRITE 


MOVE TO NEXT PAGE FOR READSEC AND WRITESEC 
ORG ($4100H) AND ÜFFÜOH 


¿READ THE NEXT SECTOR 
TRACK TO READ IS IN REGISTER B 
SECTOR TO READ IS IN REGISTER C 
BRANCH TO IABEL GSTART IF ERROR OCCURS 
READ 128 BYTES OF DATA TO ADDRESS GIVEN BY H,L 
PUSH B 


PUSH H 

** PLACE READ OPERATION HERE ** 
POP H 

POP B 

RET 
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0380 


0380 C5 
0381 Е5 


0382 El 


0383 C1 
0384 C9 


0385 


MOVE TO NEXT 1/2 PAGE FOR WRITESEC SUBROUTINE 
ORG (S AND ØFFØØH) + ВОН 


WRITESEC: ¿WRITE THE NEXT SECTOR 


че зо мо чо зо 


~o зо 


TRACK ТО WRITE IS IN REGISTER В 

SECTOR TO WRITE IS IN REGISTER C 

BRANCH TO IABEL PSTART IF ERROR OCCURS 

WRITE 128 BYPES OF DATA FROM ADDRESS GIVEN BY H,L 


РОЗН В 

РОЗН Н 

** РГАСЕ WRITE OPERATION HERE ** 
POP H 

POP B 

RET 


END OF GETSYS/PUTSYS PROGRAM 
END 
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0000 
0010 
0000 
2900 
3E00 
3bE00 
1700 
002E 


0000 
0003 
0005 


0008 СҘ6в00 


0008 


чо чо зо че чо зо че чо чо чо TO TE чо чо чо ча чо TO чо 


Ë 
2 


чо чо зо чо зо зо чо чо че TO 


APPENDIX Е: А SKELETAL, COLD START LOADER 


THIS IS A SAMPLE COLD START LOADER WHICH, WHEN MODIFIED, RESIDES 
ON TRACK 00, SECTOR 01 (THE FIRST SECTOR ON THE DISKETTE), WE 
ASSUME THAT THE CONTROLLER HAS LOADED THIS SECTOR INTO MEMORY 
UPON SYSTEM STARTUP (THIS PROGRAM CAN BE KEYED-IN, OR EXIST IN 

A PAGE OF READ-ONLY MEMORY BEYOND THE ADDRESS SPACE OF THE CP/M 
VERSION YOU ARE RUNNING). THE COLD START LOADER BRINGS THE CP/M 
SYSTEM INTO MEMORY AT /LOADP/ (NOMINALLY 2900H) + “BIAS” WHERE 
THE BIAS VALUE ACCOUNTS FOR MEMORY SYSTEMS LARGER THAN 16K, AND 
CP/M VERSIONS WHICH HANDLE THE LARGER MEMORY SPACE, IN A 16K 
SYSTEM, THE VALUE OF BIAS IS ØØØØH. AFTER LOADING THE CP/M SYS- 
TEM, THE COLD START LOADER BRANCHES TO THE “BOOT” ENTRY POINT OF 
THE BIOS, WHICH BEGINS АТ “BIOS” + “BIAS”, THE COLD START LOADER 
IS NOP USED AGAIN UNTIL THE SYSTEM IS POWERED UP AGAIN, AS LONG 
AS THE BIOS IS МОГ OVERWRITTEN. 


THE ORGIN IS 0, ASSUMING THE CONTROLLER LOADS THE COLD START 
PROGRAM AT THE BASE OF MEMORY, THIS ORIGIN MUST BE IN HIGH 

MEMORY (BEYOND THE END OF THE BIOS) IF THE COLD START LOADER 
IS IMPLEMENTED IN READ-ONLY-MEMORY, 

ORG 00008 ;ВА5Е OF MEMORY 

EQU 16 MEMORY SIZE IN KILOBYTES 

EQU (MSIZE-16)*1024 ;BIAS TO ADD TO LOAD ADDRESSES 

EQU 2900H | ;LOAD POINT FOR CP/M SYSTEM 

EQU 3EØØH ;ВАЅІС I/O SYSTEM (2 PAGES = 512 BYTES) 

EQU BIOS ;COLD START ENTRY POINT IN BIOS 

EQU BIOS4512-LOADP ;SIZE OF THE CP/M SYSTEM TO LOAD 


EQU SIZE/128 ¿NUMBER OF SECTORS TO LOAD 
BEGIN THE LOAD OPERATION 

LXI B,2 ;CLEAR B TO 0, SET C TO SECTOR 2 
MVI D,SECTS ;NUMBER OF SECTORS TO LOAD IS IN D 

LXI H,LOADP4BIAS ¿LOAD POINT IN H,L 


;LOAD NEXT SECTOR 
INSERT INLINE CODE AT THIS FOINT TO READ ONE 128 BYTE SECTOR 
FROM TRACK GIVEN BY REGISTER B, 
SECTOR GIVEN BY REGISTER C, 
INTO ADDRESS GIVEN BY REGISTER PAIR H,L 
BRANCH TO LOCATION “COLD IF A READ ERROR OCCURS 


HII II dede de dede ede e dede k de dede dee deese КККК k k k kk kk k deok dok kkk k kok k k k kokk kk КК 


USER SUPPLIED READ OPERATION GOES HERE 

okooko kokok kokk okok k dokkok deok КК КК k RIKI ааа k k kiok kk 
(SPACE IS RESERVED FOR YOUR PATCH) 

JMP PASTPATCH ¿REMOVE THIS JUMP WHEN PATCHED 

DS 60H 


006B 
006C 


006F 
0072 


0073 
0074 
0075 
0077 


007A 
007С 
0070 


0080 


15 
CA003E 


318000 
39 


вс 

79 
РЕ1В 
pA0800 


0Е01 
94 
C30800 


PASTPATCH: 


чо зо мо 


=e 


чо мо 


`° 


GO TO NEXT SECTOR IF LOAD IS INCOMPLETE 
DCR D ;SECTS-SECIS-1 
92 ВООТ+ВТА$ со TO BOOT LOADER AT ЗЕЙОН+ВТА5 


MORE SECTORS TO LOAD 
USE SP FOR SCRATCH REGISTER TO HOLD LOAD ADDRESS INCREMENT 


LXI SP,128 

DAD SP sHL=HL+128 TO NEXT LOAD ADDRESS 
INR С sSECTOR=SECTOR+1 

MOV А,С :MOVE SECTOR COUNT TO А FOR COMPARE 
CPI 27 ¿END OF CURRENT TRACK? 

JC LSECT ¿CARRY GENERATED IF SECTOR < 27 
END OF TRACK, MOVE TO NEXT TRACK 

MVI с,1 | ;SECTOR-1 

INR B УТВАСК=ТВАСК+1. 

JMP LSECT ;FOR ANOTHER SECTOR 

END 
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| 


[ENT 


p 


м 


иа ри 
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